www.gusucode.com > 网域标准通用企业自助建站系统正式版 2009 > 网域标准通用企业自助建站系统正式版 2009.18/网域公司企业网站管理系统ACCESS和SQL正式版/网域公司企业网站管理系统ACCESS正式版/DownloadShow.asp
<!--#include file="Inc/SysDown.asp" --> <!--#include file="inc/Skin_css.asp"--> <script language="JavaScript"> <!-- var flag=false; function DrawImage(ImgD){ var image=new Image(); image.src=ImgD.src; if(image.width>0 && image.height>0){ flag=true; if(image.width/image.height>= 150/150){ if(image.width>150){ ImgD.width=150; ImgD.height=(image.height*150)/image.width; }else{ ImgD.width=image.width; ImgD.height=image.height; } ImgD.alt="点击查看详细信息..."; } else{ if(image.height>150){ ImgD.height=150; ImgD.width=(image.width*150)/image.height; }else{ ImgD.width=image.width; ImgD.height=image.height; } ImgD.alt="点击查看详细信息..."; } } } function zoom_img(e, o) { var zoom = parseInt(o.style.zoom, 10) || 100; zoom += event.wheelDelta / 12; if (zoom > 0) o.style.zoom = zoom + '%'; return false; } //--> </script> <% ShowSmallClassType=ShowSmallClassType_Article dim ID ID=trim(request("ID")) if Id="" then response.Redirect("Download.asp") end if sql="select * from Download where ID=" & ID & "" Set rs= Server.CreateObject("ADODB.Recordset") rs.open sql,conn,1,3 if rs.bof and rs.eof then response.write"<SCRIPT language=JavaScript>alert('找不到此下载!');" response.write"javascript:history.go(-1)</SCRIPT>" else rs("Hits")=rs("Hits")+1 rs.update %> <!-- #include file="Head.asp" --> <table width="760" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td height="5" valign="top" bgcolor="#FFFFFF"></td> </tr> <tr> <td height="72" valign="top" bgcolor="#FFFFFF"><table width="746" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td class="tdbg_left" width="190" height="179" valign="top" > <table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td height="34" class="title_left"> <img src="Images/smallbook.jpg" width="10" height="10"> 用户登陆 </td> </tr> <tr> <td height="5"></td> </tr> <tr> <td height="10"><table width="92%" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td> <% call ShowUserLogin() %> </td> </tr> </table></td> </tr> <tr> <td height="5"></td> </tr> </table> <table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td height="34" class="title_left"> <img src="Images/smallbook.jpg" width="10" height="10"> 下载列表</td> </tr> <tr> <td height="5"></td> </tr> <tr> <td height="10"><table width="92%" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td> <% call ShowSmallClass_Down_Tree() %> </td> </tr> </table></td> </tr> <tr> <td height="5"></td> </tr> </table></td> <td width="6"></td> <td valign="top"><table Class=border width="100%" height="100%" border="0" cellpadding="0" cellspacing="0"> <tr> <td height="206" valign="top"> <table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td class="title_right" height="32"> <img src="Images/smallbook.jpg" width="10" height="10"> 下 载 中 心</td> </tr> </table> <table width="100%" border="0" cellspacing="0" cellpadding="0"> <TR> <TD width="490" height="30"> <% response.write " <a href='Download.asp?BigClassName=" & rs("BigClassName") & "'>" & rs("BigClassName") & "</a> >> " if rs("SmallClassName") & ""<>"" then response.write "<a href='Download.asp?BigClassName=" & rs("BigClassName")&"&SmallClassName=" & rs("SmallClassName") & "'>" & rs("SmallClassName") & "</a> >> " end if response.write rs("Title") %> </TD> <TD width="60"><div align="center"></div></TD> </TR> <TR bgcolor="#666666"> <TD height="1" colspan="3" bgcolor="#CCCCCC"></TD> </TR> <TR> <TD colspan="3"> <br> <table width="100%" border="0" align="center" cellpadding=0 cellSpacing=1 bgcolor="#CCCCCC" > <TR class='MC_DoShow_T1Tr1'> <td height="30" colspan=2 bgcolor="#FFFFFF"> <%=rs("Title")%></TD> </TR> <TR bgcolor="#FFFFFF" > <td width="312" height="30" > 软件语言:<%=rs("Language")%></TD> <td width="240" rowspan=5> <div align="center"> <img src="<%if rs("PhotoUrl")="" then%>Img/nopic.gif<%else%><%=rs("PhotoUrl")%><%end if%>" alt="<%=rs("title")%>" width="150" height="150" border="0" onload="javascript:DrawImage(this);"> </div></TD> </TR> <TR> <td height="30" bgcolor="#FFFFFF" > 文件大小:<%=rs("FileSize")%></TD> </TR> <TR> <td height="30" bgcolor="#FFFFFF"> 运行环境:<%=rs("System")%></TD> </TR> <TR> <td height="30" bgcolor="#FFFFFF" > 整理日期:<%=FormatDateTime(rs("AddDate"),2)%></TD> </TR> <TR> <td height="30" bgcolor="#FFFFFF" > 下载次数:<%=rs("Hits")%></TD> </TR> </TABLE> <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td class="title_right" height="32"> ::下载地址::</td> </tr> <tr> <td height="35"> ┊<a href="<%=rs("DownloadUrl")%>" target=_blank><font color="#FF0000">下载地址</font></a>┊</td> </tr> <tr> <td class="title_right" height="32"> <img src="Images/smallbook.jpg" width="10" height="10"> 下载说明</td> </tr> </table> <table width="95%" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td height="10"></td> </tr> <tr> <td><%=rs("Content")%></td> </tr> </table></TD> </TR> <TR> <TD colspan="3" background=img/naBialym.gif><IMG height=1 src="img/1x1_pix.gif" width=10></TD> </TR> <TR> <TD height="19" colspan="2"> <div align="right">【<a href='javascript:history.back()'>返回</a>】</div> <div align="center"></div></TD> </TR> </table> </td> </tr> </table></td> </tr> </table></td> </tr> </table> <!-- #include file="Inc/Foot.asp" --> </BODY></HTML> <% end if rs.close set rs=nothing call CloseConn() %>